Fix bug when show-prefix is left and there is one line

Fixes #104

diff --git a/which-key.el b/which-key.el
index 12e4d1b82c8d408d21daea1525bb0736d97ed1fd..ab0713daafd44a6f1d9dc58cbea8b41e2d3aa989 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -1677,7 +1677,7 @@ including prefix arguments."
                           (make-string first-col-width 32)))
               lines first-line new-end)
          (if (= 1 height)
-             (concat prefix page)
+             (cons (concat prefix page) nil)
            (setq lines (split-string page "\n")
                  first-line (concat prefix (car lines) "\n" page-cnt)
                  new-end (concat "\n" (make-string first-col-width 32)))